home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / ctdate / ct_date.frm next >
Text File  |  1995-12-05  |  13KB  |  470 lines
  1. VERSION 2.00
  2. Begin Form w_ctdate_demo 
  3.    BackColor       =   &H00C0C0C0&
  4.    BorderStyle     =   1  'Fixed Single
  5.    Caption         =   "ctDATE (Monthly Calendar) Demo"
  6.    ClientHeight    =   5550
  7.    ClientLeft      =   570
  8.    ClientTop       =   1335
  9.    ClientWidth     =   8805
  10.    Height          =   5955
  11.    Icon            =   CT_DATE.FRX:0000
  12.    Left            =   510
  13.    LinkTopic       =   "Form1"
  14.    ScaleHeight     =   5550
  15.    ScaleWidth      =   8805
  16.    Top             =   990
  17.    Width           =   8925
  18.    Begin TextBox txt_date 
  19.       BackColor       =   &H00FFFFFF&
  20.       FontBold        =   0   'False
  21.       FontItalic      =   0   'False
  22.       FontName        =   "MS Sans Serif"
  23.       FontSize        =   8.25
  24.       FontStrikethru  =   0   'False
  25.       FontUnderline   =   0   'False
  26.       ForeColor       =   &H00000000&
  27.       Height          =   315
  28.       Left            =   5820
  29.       TabIndex        =   18
  30.       Top             =   1380
  31.       Width           =   2355
  32.    End
  33.    Begin PictureBox ctPush1 
  34.       BackColor       =   &H000000FF&
  35.       Height          =   1000
  36.       Left            =   0
  37.       ScaleHeight     =   975
  38.       ScaleWidth      =   975
  39.       TabIndex        =   0
  40.       Top             =   0
  41.       Width           =   1000
  42.    End
  43.    Begin PictureBox ctDate1 
  44.       BackColor       =   &H000000FF&
  45.       Height          =   1000
  46.       Left            =   0
  47.       ScaleHeight     =   975
  48.       ScaleWidth      =   975
  49.       TabIndex        =   3
  50.       Top             =   0
  51.       Width           =   1000
  52.    End
  53.    Begin PictureBox ctGroup2 
  54.       BackColor       =   &H000000FF&
  55.       Height          =   1000
  56.       Left            =   0
  57.       ScaleHeight     =   975
  58.       ScaleWidth      =   975
  59.       TabIndex        =   4
  60.       Top             =   0
  61.       Width           =   1000
  62.       Begin PictureBox ctlw 
  63.          BackColor       =   &H000000FF&
  64.          Height          =   1000
  65.          Left            =   0
  66.          ScaleHeight     =   975
  67.          ScaleWidth      =   975
  68.          TabIndex        =   8
  69.          Top             =   0
  70.          Width           =   1000
  71.       End
  72.       Begin PictureBox ctraise 
  73.          BackColor       =   &H000000FF&
  74.          Height          =   1000
  75.          Left            =   0
  76.          ScaleHeight     =   975
  77.          ScaleWidth      =   975
  78.          TabIndex        =   9
  79.          Top             =   0
  80.          Width           =   1000
  81.       End
  82.       Begin PictureBox ctRadio2 
  83.          BackColor       =   &H000000FF&
  84.          Height          =   1000
  85.          Left            =   0
  86.          ScaleHeight     =   975
  87.          ScaleWidth      =   975
  88.          TabIndex        =   10
  89.          Top             =   0
  90.          Width           =   1000
  91.       End
  92.       Begin PictureBox ctRadio1 
  93.          BackColor       =   &H000000FF&
  94.          Height          =   1000
  95.          Left            =   0
  96.          ScaleHeight     =   975
  97.          ScaleWidth      =   975
  98.          TabIndex        =   11
  99.          Top             =   0
  100.          Width           =   1000
  101.       End
  102.    End
  103.    Begin PictureBox ctGroup1 
  104.       BackColor       =   &H000000FF&
  105.       Height          =   1000
  106.       Left            =   0
  107.       ScaleHeight     =   975
  108.       ScaleWidth      =   975
  109.       TabIndex        =   12
  110.       Top             =   0
  111.       Width           =   1000
  112.       Begin PictureBox ctRadio4 
  113.          BackColor       =   &H000000FF&
  114.          Height          =   1000
  115.          Left            =   0
  116.          ScaleHeight     =   975
  117.          ScaleWidth      =   975
  118.          TabIndex        =   13
  119.          Top             =   0
  120.          Width           =   1000
  121.       End
  122.       Begin PictureBox ctRadio3 
  123.          BackColor       =   &H000000FF&
  124.          Height          =   1000
  125.          Left            =   0
  126.          ScaleHeight     =   975
  127.          ScaleWidth      =   975
  128.          TabIndex        =   14
  129.          Top             =   0
  130.          Width           =   1000
  131.       End
  132.       Begin PictureBox rb_none 
  133.          BackColor       =   &H000000FF&
  134.          Height          =   1000
  135.          Left            =   0
  136.          ScaleHeight     =   975
  137.          ScaleWidth      =   975
  138.          TabIndex        =   15
  139.          Top             =   0
  140.          Width           =   1000
  141.       End
  142.       Begin PictureBox rb_regular 
  143.          BackColor       =   &H000000FF&
  144.          Height          =   1000
  145.          Left            =   0
  146.          ScaleHeight     =   975
  147.          ScaleWidth      =   975
  148.          TabIndex        =   16
  149.          Top             =   0
  150.          Width           =   1000
  151.       End
  152.    End
  153.    Begin CommandButton Command2 
  154.       Caption         =   "Today"
  155.       Height          =   375
  156.       Left            =   1440
  157.       TabIndex        =   5
  158.       Top             =   4980
  159.       Width           =   945
  160.    End
  161.    Begin PictureBox date_next 
  162.       BackColor       =   &H000000FF&
  163.       Height          =   1000
  164.       Left            =   0
  165.       ScaleHeight     =   975
  166.       ScaleWidth      =   975
  167.       TabIndex        =   17
  168.       Top             =   0
  169.       Width           =   1000
  170.    End
  171.    Begin PictureBox date_prev 
  172.       BackColor       =   &H000000FF&
  173.       Height          =   1000
  174.       Left            =   0
  175.       ScaleHeight     =   975
  176.       ScaleWidth      =   975
  177.       TabIndex        =   21
  178.       Top             =   0
  179.       Width           =   1000
  180.    End
  181.    Begin CommandButton Command1 
  182.       Caption         =   "Exit"
  183.       Height          =   375
  184.       Left            =   4320
  185.       TabIndex        =   1
  186.       Top             =   5040
  187.       Width           =   795
  188.    End
  189.    Begin PictureBox ctDate 
  190.       BackColor       =   &H000000FF&
  191.       Height          =   1000
  192.       Left            =   0
  193.       ScaleHeight     =   975
  194.       ScaleWidth      =   975
  195.       TabIndex        =   22
  196.       Top             =   0
  197.       Width           =   1000
  198.    End
  199.    Begin Label lbl_move 
  200.       Alignment       =   2  'Center
  201.       BackColor       =   &H00C0C0C0&
  202.       Caption         =   "Click on the arrows beside the title to move to a different month."
  203.       FontBold        =   0   'False
  204.       FontItalic      =   0   'False
  205.       FontName        =   "MS Sans Serif"
  206.       FontSize        =   9.75
  207.       FontStrikethru  =   0   'False
  208.       FontUnderline   =   0   'False
  209.       ForeColor       =   &H00800000&
  210.       Height          =   675
  211.       Left            =   6090
  212.       TabIndex        =   20
  213.       Top             =   4500
  214.       Visible         =   0   'False
  215.       Width           =   2145
  216.    End
  217.    Begin Label Label3 
  218.       Alignment       =   2  'Center
  219.       BackStyle       =   0  'Transparent
  220.       Caption         =   "The example above uses a label control, picture push button, and a calendar control to simulate a drop down calendar box. Press the button to view the calendar"
  221.       FontBold        =   0   'False
  222.       FontItalic      =   0   'False
  223.       FontName        =   "MS Sans Serif"
  224.       FontSize        =   9.75
  225.       FontStrikethru  =   0   'False
  226.       FontUnderline   =   0   'False
  227.       ForeColor       =   &H00800000&
  228.       Height          =   2175
  229.       Left            =   6060
  230.       TabIndex        =   19
  231.       Top             =   2100
  232.       Width           =   2205
  233.    End
  234.    Begin Label sle_date 
  235.       BackColor       =   &H00FFFFFF&
  236.       BorderStyle     =   1  'Fixed Single
  237.       FontBold        =   0   'False
  238.       FontItalic      =   0   'False
  239.       FontName        =   "MS Sans Serif"
  240.       FontSize        =   8.25
  241.       FontStrikethru  =   0   'False
  242.       FontUnderline   =   0   'False
  243.       Height          =   315
  244.       Left            =   1800
  245.       TabIndex        =   7
  246.       Top             =   1080
  247.       Width           =   2475
  248.    End
  249.    Begin Label Label2 
  250.       BackColor       =   &H00C0C0C0&
  251.       Caption         =   "Date Selected :"
  252.       FontBold        =   0   'False
  253.       FontItalic      =   0   'False
  254.       Fon